home *** CD-ROM | disk | FTP | other *** search
/ Cream of the Crop 26 / Cream of the Crop 26.iso / program / ddj0897.zip / DYN401.ZIP / class / dict.c < prev    next >
C/C++ Source or Header  |  1997-04-16  |  3KB  |  148 lines
  1.  
  2.  
  3. /*  Copyright (c) 1993-1996 Algorithms Corporation  */
  4. /*  All rights reserved.  */
  5.  
  6.  
  7.  
  8.  
  9. /*  This file automatically generated by dpp - do not edit  */
  10.  
  11. #define    DPP_STRATEGY    2
  12. #define    DPP_FASTWIDE    0
  13.  
  14.  
  15.  
  16.  
  17. #define    CLASS    Dictionary_c
  18. #define    ivType    Dictionary_iv_t
  19.  
  20. #include "generics.h"
  21.  
  22. object    Dictionary_c;
  23.  
  24.  
  25. #line 24 "dict.d"
  26. #include "set1.h" 
  27.  
  28.  
  29. #define LTYPE 1 
  30.  
  31. static gLookup_t Lookup; 
  32.  
  33. imeth objrtn Dictionary_im_gAddValue(object self, object key, object value)
  34. { 
  35.     ChkArg(key, 2); 
  36.     ChkArgNul(value, 3); 
  37.     return Lookup(self, key, HT_ADD, 0, LTYPE, value); 
  38. } 
  39.  
  40. imeth objrtn Dictionary_im_gFindValue(object self, object key)
  41. { 
  42.     object x; 
  43.  
  44.     ChkArg(key, 2); 
  45.     x = Lookup(self, key, HT_FIND, 0, LTYPE, NULL); 
  46.     return x ? gValue(x) : x; 
  47. } 
  48.  
  49. imeth objrtn Dictionary_im_gFind(object self, object key)
  50. { 
  51.     ChkArg(key, 2); 
  52.     return Lookup(self, key, HT_FIND, 0, LTYPE, NULL); 
  53. } 
  54.  
  55. imeth objrtn Dictionary_im_gChangeValueWithObj(object self, object key, object val)
  56. { 
  57.     object x; 
  58.     ChkArg(key, 2); 
  59.     ChkArgNul(val, 3); 
  60.     x = Lookup(self, key, HT_FIND, 0, LTYPE, NULL); 
  61.     return x ? gChangeValue(x, val) : x; 
  62. } 
  63.  
  64. imeth objrtn Dictionary_im_gFindAddValue(object self, object key, object value)
  65. { 
  66.     ChkArg(key, 2); 
  67.     ChkArgNul(value, 3); 
  68.     return Lookup(self, key, HT_FINDADD, 0, LTYPE, value); 
  69. } 
  70.  
  71. imeth objrtn Dictionary_im_gDispose(object self)
  72. { 
  73.     return gDispose1(self); 
  74. } 
  75.  
  76. imeth objrtn Dictionary_im_gDisposeAllNodes(object self)
  77. { 
  78.     return gDisposeAllNodes1(self); 
  79. } 
  80.  
  81. imeth objrtn Dictionary_im_gRemoveObj(object self, object key)
  82. { 
  83.     ChkArg(key, 2); 
  84.     return Lookup(self, key, HT_DELETE, 1, LTYPE, NULL); 
  85. } 
  86.  
  87. imeth objrtn Dictionary_im_gDeepDisposeObj(object self, object key)
  88. { 
  89.     ChkArg(key, 2); 
  90.     return Lookup(self, key, HT_DELETE, 2, LTYPE, NULL); 
  91. } 
  92.  
  93. static void init_class(void) 
  94. { 
  95.     Lookup = imcPointer(Set, gLookup); 
  96. } 
  97.  
  98. #line 99 "dict.c"
  99.  
  100. objrtn    Dictionary_initialize(void)
  101. {
  102.     static  CRITICALSECTION  cs;
  103.     static  int volatile once = 0;
  104.  
  105.     ENTERCRITICALSECTION(_CI_CS_);
  106.     if (!once) {
  107.         INITIALIZECRITICALSECTION(cs);
  108.         once = 1;
  109.     }
  110.     LEAVECRITICALSECTION(_CI_CS_);
  111.  
  112.     ENTERCRITICALSECTION(cs);
  113.  
  114.     if (Dictionary_c) {
  115.         LEAVECRITICALSECTION(cs);
  116.         return Dictionary_c;
  117.     }
  118.     INHIBIT_THREADER;
  119.     Set_initialize();
  120.     if (Dictionary_c)  {
  121.         ENABLE_THREADER;
  122.         LEAVECRITICALSECTION(cs);
  123.         return Dictionary_c;
  124.     }
  125.     Dictionary_c = gNewClass(Class, "Dictionary", 0, 0, Set, END);
  126.     iMethodFor(Dictionary, gDeepDisposeObj, Dictionary_im_gDeepDisposeObj);
  127.     iMethodFor(Dictionary, gChangeValueWithObj, Dictionary_im_gChangeValueWithObj);
  128.     iMethodFor(Dictionary, gFind, Dictionary_im_gFind);
  129.     iMethodFor(Dictionary, gDisposeObj, Dictionary_im_gDeepDisposeObj);
  130.     iMethodFor(Dictionary, gDisposeAllNodes, Dictionary_im_gDisposeAllNodes);
  131.     iMethodFor(Dictionary, gRemoveObj, Dictionary_im_gRemoveObj);
  132.     iMethodFor(Dictionary, gDispose, Dictionary_im_gDispose);
  133.     iMethodFor(Dictionary, gFindAddValue, Dictionary_im_gFindAddValue);
  134.     iMethodFor(Dictionary, gAddValue, Dictionary_im_gAddValue);
  135.     iMethodFor(Dictionary, gFindValue, Dictionary_im_gFindValue);
  136.  
  137.     init_class();
  138.  
  139.     ENABLE_THREADER;
  140.  
  141.     LEAVECRITICALSECTION(cs);
  142.  
  143.     return Dictionary_c;
  144. }
  145.  
  146.  
  147.  
  148.